home *** CD-ROM | disk | FTP | other *** search
/ Inside the White House / Inside the White House.iso / whouse.dir / 00102_right text.ls < prev    next >
Encoding:
Text File  |  1995-08-01  |  280 b   |  15 lines
  1. on mouseDown
  2.   puppetSound("click down")
  3.   set the ink of sprite the clickOn to 4
  4.   updateStage()
  5.   repeat while the stillDown or soundBusy(1)
  6.   end repeat
  7.   puppetSound("click up")
  8.   set the ink of sprite the clickOn to 36
  9.   updateStage()
  10. end
  11.  
  12. on mouseUp
  13.   go(the frame + 1)
  14. end
  15.